home *** CD-ROM | disk | FTP | other *** search
Text File | 1996-05-01 | 3.9 KB | 107 lines | [TEXT/MPS ] |
- ;
- ; File: Finder.a
- ;
- ; Contains: Finder flags and container types.
- ;
- ; Version: Technology: System 7.5
- ; Release: Universal Interfaces 3.0d3 on Copland DR1
- ;
- ; Copyright: © 1984-1996 by Apple Computer, Inc. All rights reserved.
- ;
- ; Bugs?: If you find a problem with this file, send the file and version
- ; information (from above) and the problem description to:
- ;
- ; Internet: apple.bugs@applelink.apple.com
- ; AppleLink: APPLE.BUGS
- ;
- ;
- IF &TYPE('__FINDER__') = 'UNDEFINED' THEN
- __FINDER__ SET 1
-
- IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
- include 'Types.a'
- ENDIF
-
- ; Make only the following consts avaiable to resource files that include this file
- kCustomIconResource EQU -16455 ; Custom icon family resource ID
- kContainerFolderAliasType EQU 'fdrp' ; type for folder aliases
- kContainerTrashAliasType EQU 'trsh' ; type for trash folder aliases
- kContainerHardDiskAliasType EQU 'hdsk' ; type for hard disk aliases
- kContainerFloppyAliasType EQU 'flpy' ; type for floppy aliases
- kContainerServerAliasType EQU 'srvr' ; type for server aliases
- kApplicationAliasType EQU 'adrp' ; type for application aliases
- kContainerAliasType EQU 'drop' ; type for all other containers
- ; types for Special folder aliases
- kSystemFolderAliasType EQU 'fasy'
- kAppleMenuFolderAliasType EQU 'faam'
- kStartupFolderAliasType EQU 'fast'
- kPrintMonitorDocsFolderAliasType EQU 'fapn'
- kPreferencesFolderAliasType EQU 'fapf'
- kControlPanelFolderAliasType EQU 'fact'
- kExtensionFolderAliasType EQU 'faex' ; types for AppleShare folder aliases
- kExportedFolderAliasType EQU 'faet'
- kDropFolderAliasType EQU 'fadr'
- kSharedFolderAliasType EQU 'fash'
- kMountedFolderAliasType EQU 'famn'
-
- ; Finder Flags
- kIsOnDesk EQU $01
- kColor EQU $0E
- kIsShared EQU $40
- kHasBeenInited EQU $0100
- kHasCustomIcon EQU $0400
- kIsStationery EQU $0800
- kIsStationary EQU $0800
- kNameLocked EQU $1000
- kHasBundle EQU $2000
- kIsInvisible EQU $4000
- kIsAlias EQU $8000
- ;
- ; The following declerations used to be in Files.i,
- ; but are Finder specific and were moved here.
- ;
- IF ¬ OLDROUTINELOCATIONS THEN
-
- ; Finder Constants
- fOnDesk EQU 1
- fHasBundle EQU 8192
- fTrash EQU -3
- fDesktop EQU -2
- fDisk EQU 0
- FInfo RECORD 0
- fdType ds.l 1 ; offset: $0 (0) ; the type of the file
- fdCreator ds.l 1 ; offset: $4 (4) ; file's creator
- fdFlags ds.w 1 ; offset: $8 (8) ; flags ex. hasbundle,invisible,locked, etc.
- fdLocation ds Point ; offset: $A (10) ; file's location in folder
- fdFldr ds.w 1 ; offset: $E (14) ; folder containing file
- sizeof EQU * ; size: $10 (16)
- ENDR
- FXInfo RECORD 0
- fdIconID ds.w 1 ; offset: $0 (0) ; Icon ID
- fdUnused ds.w 3 ; offset: $2 (2) ; unused but reserved 6 bytes
- fdScript ds.b 1 ; offset: $8 (8) ; Script flag and number
- fdXFlags ds.b 1 ; offset: $9 (9) ; More flag bits
- fdComment ds.w 1 ; offset: $A (10) ; Comment ID
- fdPutAway ds.l 1 ; offset: $C (12) ; Home Dir ID
- sizeof EQU * ; size: $10 (16)
- ENDR
- DInfo RECORD 0
- frRect ds Rect ; offset: $0 (0) ; folder rect
- frFlags ds.w 1 ; offset: $8 (8) ; Flags
- frLocation ds Point ; offset: $A (10) ; folder location
- frView ds.w 1 ; offset: $E (14) ; folder view
- sizeof EQU * ; size: $10 (16)
- ENDR
- DXInfo RECORD 0
- frScroll ds Point ; offset: $0 (0) ; scroll position
- frOpenChain ds.l 1 ; offset: $4 (4) ; DirID chain of open folders
- frScript ds.b 1 ; offset: $8 (8) ; Script flag and number
- frXFlags ds.b 1 ; offset: $9 (9) ; More flag bits
- frComment ds.w 1 ; offset: $A (10) ; comment
- frPutAway ds.l 1 ; offset: $C (12) ; DirID
- sizeof EQU * ; size: $10 (16)
- ENDR
- ENDIF
- ENDIF ; __FINDER__
-
-